***DO FILE FOR: Analyzing Mass Attitudes Towards the International Court of Justice
***FOREIGN POLICY ANALYSIS



***Table 2
***Model 1:
probit icj_vote_choice b3.cost_three cosmopolitanism c.sdo_scale nationalism supranationalism  q11_government q11_un q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 if q2==1 [pweight=ps_wgt]

margins, at(cosmopolitanism=(1(1)3))
margins, at(q11_government=(1(1)4))
margins, at(party_three=(1(1)3))
margins, at(q11_un=(1(1)4))


***Model 2:
probit icj_vote_choice b3.cost_three c.cosmopolitanism##c.sdo_scale nationalism supranationalism  q11_government q11_un q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 if q2==1 [pweight=ps_wgt]



***Table 3

***Model 3:
probit compliance b3.cost_three cosmopolitanism c.sdo_scale nationalism supranationalism  q11_government q11_un q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 [pweight=ps_wgt]


***Model 4:
probit compliance b3.cost_three c.cosmopolitanism##c.sdo_scale nationalism supranationalism  q11_government q11_un q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 [pweight=ps_wgt]



***Table 4
probit icj_vote_choice b3.cost_three cosmopolitanism c.sdo_scale nationalism supranationalism  q11_government q11_un q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 if q2==1 [pweight=ps_wgt]

margins, at(cosmopolitanism=(1 3))
margins, at(q11_government=(1 4))
margins, at(party_three=(1 2))
margins, at(q11_un=(1 4))




***FIGURE 1
probit icj_vote_choice supranationalism nationalism cosmopolitanism b3.cost_three q1_age q14_sex q9_highschool q8_politics q11_government q11_un sdo_scale i.party_three i.q6 if q2==1 [pweight=ps_wgt]

margins, at(cost_three=(1(1)3))
marginsplot, title (Figure 1: Predicted Probabilities (Support for Adjudication)) yscale(titlegap(2)) xtitle("Perceived Cost of ICJ Adjudication") ytitle(Probability of Support for Adjudication) plotopts(connect(none)) xlabel(1 "High Cost" 2 "Low Cost" 3 "Don't know") xscale(range(.5 3.5) titlegap(2))



***FIGURE 2
probit compliance supranationalism nationalism b3.cost_three q1_age q14_sex q9_highschool q8_politics q11_government q11_un c.sdo_scale##c.cosmopolitanism i.party_three i.q6 [pweight=ps_wgt]

margins, dydx(sdo_scale) at(cosmopolitanism=(1(1)3))
marginsplot, title (Figure 2: Effect of SDO on Support for Compliance) subtitle(By Cosmopolitanism) yscale(titlegap(2)) xtitle("Level of Cosmopolitanism") ytitle(Effect on Probability of Compliance = 1) plotopts(connect(none)) xlabel(1 "Low" 2 "Medium" 3 "High") yline(0) xscale(range(.5 3.5) titlegap(2))




***FIGURE 3
probit compliance supranationalism nationalism b3.cost_three q1_age q14_sex q9_highschool q8_politics q11_government q11_un c.sdo_scale##c.cosmopolitanism i.party_three i.q6 [pweight=ps_wgt]

margins, at(sdo_scale=(1(.5)3) cosmopolitanism=(1 3))
marginsplot, title (Figure 3: Predicted Probabilities (Support for Compliance)) yscale(titlegap(2)) xtitle("Level of Social Dominance Orientation") ytitle(Probability of Support for Compliance) xscale(titlegap(2)) legend(order(3 "Low Cosmopolitanism" 4 "High Cosmopolitanism") cols(1))



***APPENDIX MATERIAL

***SECTION B (DESCRIPTIVES)
sum icj_vote_choice if q2==1
sum compliance
tab cost_three
sum cosmopolitanism
sum sdo_scale
sum nationalism
sum supranationalism
sum q11_government
sum q11_un
sum q1_age
sum q14
sum q9
sum q8
tab party_three
tab q6



***SECTION C (VALIDITY TEST)
ttest sdo_scale, by(q9)
ttest sdo_scale, by(nationalism_binary)



***SECTION D (INTERITEM CORRELATIONS)
pwcorr q1_age q8, sig
pwcorr q1_age cosmopolitanism, sig
pwcorr q1_age sdo_scale, sig
pwcorr q1_age nationalism, sig
pwcorr q1_age supranationalism, sig
pwcorr q1_age q11_government, sig
pwcorr q1_age q11_un, sig

pwcorr q8 cosmopolitanism, sig
pwcorr q8 sdo_scale, sig
pwcorr q8 nationalism, sig
pwcorr q8 supranationalism, sig
pwcorr q8 q11_government, sig
pwcorr q8 q11_un, sig

pwcorr cosmopolitanism sdo_scale, sig
pwcorr cosmopolitanism nationalism, sig
pwcorr cosmopolitanism supranationalism, sig
pwcorr cosmopolitanism q11_government, sig
pwcorr cosmopolitanism q11_un, sig

pwcorr sdo_scale nationalism, sig
pwcorr sdo_scale supranationalism, sig
pwcorr sdo_scale q11_government, sig
pwcorr sdo_scale q11_un, sig

pwcorr nationalism supranationalism, sig
pwcorr nationalism q11_government, sig
pwcorr nationalism q11_un, sig

pwcorr supranationalism q11_government, sig
pwcorr supranationalism q11_un, sig

pwcorr q11_government q11_un, sig



***SECTION E (ROBUSTNESS CHECKS)

***Table A1 (COMPLIANCE; REGISTERED VOTERS ONLY)
*Model A1:
probit compliance supranationalism nationalism b3.cost_three q1_age q14_sex q9_highschool q8_politics q11_government q11_un c.sdo_scale c.cosmopolitanism i.party_three i.q6 if q2==1 [pweight=ps_wgt]

*Model A2:
probit compliance supranationalism nationalism b3.cost_three q1_age q14_sex q9_highschool q8_politics q11_government q11_un c.sdo_scale##c.cosmopolitanism i.party_three i.q6 if q2==1 [pweight=ps_wgt]



***Table A2 (COMPLIANCE; SEPARATE MODELS FOR HIGH AND LOW COSMOPOLITANS)
*Model A3 (LOW COSMOPOLITANISM):
probit compliance supranationalism nationalism b3.cost_three q1_age q14_sex q9_highschool q8_politics q11_government q11_un c.sdo_scale i.party_three i.q6 if cosmopolitanism<3 [pweight=ps_wgt]

*Model A4 (HIGH COSMOPOLITANISM):
probit compliance supranationalism nationalism b3.cost_three q1_age q14_sex q9_highschool q8_politics q11_government q11_un c.sdo_scale i.party_three i.q6 if cosmopolitanism==3 [pweight=ps_wgt]



***Table A3 (ICJ ADJUDICATION; FIXED EFFECTS OMITTED)
*Model A5:
probit icj_vote_choice b3.cost_three cosmopolitanism c.sdo_scale nationalism supranationalism  q11_government q11_un q1_age q14_sex q9_highschool q8_politics i.party_three if q2==1 [pweight=ps_wgt]

*Model A6:
probit icj_vote_choice b3.cost_three c.cosmopolitanism##c.sdo_scale nationalism supranationalism  q11_government q11_un q1_age q14_sex q9_highschool q8_politics i.party_three if q2==1 [pweight=ps_wgt]



***Table A4 (COMPLIANCE; FIXED EFFECTS OMITTED)
*Model A7:
probit compliance b3.cost_three cosmopolitanism c.sdo_scale nationalism supranationalism  q11_government q11_un q1_age q14_sex q9_highschool q8_politics i.party_three [pweight=ps_wgt]


*Model A8:
probit compliance b3.cost_three c.cosmopolitanism##c.sdo_scale nationalism supranationalism  q11_government q11_un q1_age q14_sex q9_highschool q8_politics i.party_three [pweight=ps_wgt]



***Table A5 (ICJ ADJUDICATION; TRUST IN UN OMITTED)
*Model A9:
probit icj_vote_choice b3.cost_three cosmopolitanism c.sdo_scale nationalism supranationalism  q11_government q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 if q2==1 [pweight=ps_wgt]


*Model A10:
probit icj_vote_choice b3.cost_three c.cosmopolitanism##c.sdo_scale nationalism supranationalism  q11_government q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 if q2==1 [pweight=ps_wgt]



***Table A6 (COMPLIANCE; TRUST IN UN OMITTED)
*Model A11:
probit compliance b3.cost_three cosmopolitanism c.sdo_scale nationalism supranationalism  q11_government q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 [pweight=ps_wgt]


*Model A12:
probit compliance b3.cost_three c.cosmopolitanism##c.sdo_scale nationalism supranationalism  q11_government q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 [pweight=ps_wgt]



***Table A7 (ICJ ADJUDICATION; TRUST IN BELIZE'S GOVERNMENT OMITTED)
*Model A13:
probit icj_vote_choice b3.cost_three cosmopolitanism c.sdo_scale nationalism supranationalism q11_un q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 if q2==1 [pweight=ps_wgt]


*Model A14:
probit icj_vote_choice b3.cost_three c.cosmopolitanism##c.sdo_scale nationalism supranationalism q11_un q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 if q2==1 [pweight=ps_wgt]



***Table A8 (COMPLIANCE; TRUST IN TRUST IN BELIZE'S GOVERNMENT OMITTED)
*Model A15:
probit compliance b3.cost_three cosmopolitanism c.sdo_scale nationalism supranationalism q11_un q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 [pweight=ps_wgt]

*Model A16:
probit compliance b3.cost_three c.cosmopolitanism##c.sdo_scale nationalism supranationalism q11_un q1_age q14_sex q9_highschool q8_politics i.party_three i.q6 [pweight=ps_wgt]



